## cargando la librería 'foreign' que tiene el 'read.spss'
library(foreign)

## cambiando el directorio 
setwd("<path a los archivos .sav>")

## leyendo los archivos .sav
ind = read.spss("individual_t213.sav")
hog = read.spss("hogar_t213.sav")

## exportando a CSV
write.csv(ind, file = "ind.csv")
write.csv(hog, file = "hog.csv")
